home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 2
/
Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso
/
Aminet
/
util
/
gnu
/
emacs_src.lha
/
emacs-18.58
/
.emacs-menu.el
< prev
next >
Wrap
Text File
|
1992-05-16
|
2KB
|
1 lines
(amiga-menus-set (quote (("Project" (("Open C-x C-f" (call-interactively (quote find-file)) 79) ("Save C-x C-s" (call-interactively (quote save-buffer)) 83) ("Save As C-x C-w" (call-interactively (quote write-file)) 87) nil ("Quit C-x C-c" (call-interactively (quote save-buffers-kill-emacs)) 81))) ("Edit" (("Undo C-_" (call-interactively (quote undo)) 85) nil ("Mark C-@" (call-interactively (quote set-mark-command)) 77) ("Cut C-w" (call-interactively (quote kill-region)) 88) ("Copy M-w" (call-interactively (quote copy-region-as-kill)) 67) ("Paste C-y" (call-interactively (quote yank)) 86) ("Paste Previous M-y" (call-interactively (quote yank-pop)) nil))) ("Search" (("Find Forward C-s" (call-interactively (quote isearch-forward)) 70) ("Find Backward C-r" (call-interactively (quote isearch-backward)) 66) nil ("Find Fwd Regexp M-C-s" (call-interactively (quote isearch-forward-regexp)) nil) ("Find Bwd Regexp" (call-interactively (quote isearch-backward-regexp)) nil) nil ("Query Replace M-%" (call-interactively (quote query-replace)) 82) ("Query Rpl Regexp" (call-interactively (quote query-replace-regexp)) nil))) ("Window" (("Split C-x 2" (call-interactively (quote split-window-vertically)) 50) ("Split H C-x 5" (call-interactively (quote split-window-horizontally)) nil) nil ("One Window C-x 1" (call-interactively (quote delete-other-windows)) 49) ("Delete C-x 0" (call-interactively (quote delete-window)) 48) nil ("Enlarge C-x ^" (call-interactively (quote enlarge-window)) 69) ("Next C-x o" (call-interactively (quote other-window)) 78))) ("Buffers" (("List C-x C-b" (call-interactively (quote list-buffers)) nil) ("Change C-x b" (call-interactively (quote switch-to-buffer)) nil) ("Kill C-x k" (call-interactively (quote kill-buffer)) nil))) ("Help" (("Tutorial C-h t" (call-interactively (quote help-with-tutorial)) 84) ("Information C-h i" (call-interactively (quote info)) 72) nil ("Where Is Command C-h w" (call-interactively (quote where-is)) nil) ("What Is Command C-h f" (call-interactively (quote describe-function)) nil) ("What Is Key C-h k" (call-interactively (quote describe-key)) nil) ("Apropos C-h a" (call-interactively (quote command-apropos)) nil))))))